home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple Developer Connection Student Program
/
ADC Tools Sampler CD Disk 3 1999.iso
/
Apple Development Tools
/
ToolServer 3.4.1.sit
/
ToolServer 3.4.1
/
MWStartup•411
< prev
next >
Wrap
Text File
|
1993-07-20
|
3KB
|
83 lines
# MWStartup•411
# July 20, 1993
# ©Copyright 1993 by metrowerks inc. All rights reserved.
# 411 startup script for use with the Metrowerks Environment and ToolServer.
# This script is a modified version of the UserStartup•Help script
# that comes with MPW 411. Because of the limitations of ToolServer,
# some functionality is not available, but the basic template and
# lookup functions are available.
# Do not install this script unless you have 411 installed.
# This script is derived from the 411 "UserStartup•Help" script,
# copyright ©1991, 1992 Apple Computer Inc.
#
# To automatically mount your 411 file server when MPW launches...
#
# Set the "Help_Server" variable to the "zone:server:volume" where your "411"
# help folder resides. Requires the MPW 3.2 Choose command.
#
Set Help_Server "" # "Development Tools:Okefenokee:The Star:"
Set Guest 0 # set to 1 # if you want to log on as guest, else set to 0.
IF "{Help_Server}" != ""
if not "`Exists "{Help_Server}"`"
IF {Guest}
Choose "{Help_Server}" -guest
Else
Choose "{Help_Server}" -u "{User}" -askpw
End
End
End
# Set type of header - default is abreviated header
Set headerStyle -h2 # Set headerStyle -h # Expanded header -lists all files searched
# Specify the help directory
Set HelpDirectory "{ShellDirectory}Help Folder:"
# Get the location of:
# ... the 411 directory,
# ... the current 411 template and
if not "`Exists "{HelpDirectory}"`"
NewFolder "{HelpDirectory}"
End
if "`Exists "{HelpDirectory}"Help_Folder`"
Set Help_Folder "`Catenate "{HelpDirectory}"Help_Folder`"; set filesStatus 0;∂
set exit 0;(set x "`Files "{Help_Folder}"≈Help`") ≥dev:null; Set filesStatus {status}; ∂
if "{x}" != ""; set filesStatus 1; end; set exit 1; ∂
End
if not "`Exists "{HelpDirectory}"Help_Folder`" || not "`Exists "{Help_Folder}"`" || !{filesStatus}
Set exit 0; Set temp "{Boot}"; Loop; ∂
Set temp "`(GetFileName "{temp}" -q -d -m "Where is your ∂"411∂" folder?")≥dev:null`"; ∂
if "{temp}"!=""; Echo -n "{temp}" > "{HelpDirectory}"Help_Folder; ∂
Set Help_Folder "{temp}"; Else; set exit 1; exit; End; ∂
(set x "`Files "{temp}"≈Help`") ≥dev:null; ∂
if "{x}"==""; Alert 411 - The ∂"{temp}∂" folder does not contain Help files.; else; break; end; End; ∂
set exit 1 ; ∂
End
if not "`Exists "{HelpDirectory}"Help_Files`"
Set exit 0;(Files "{Help_Folder}"≈Help -q)≥ dev:null > "{HelpDirectory}"Help_Files;set exit 1
End
Set Help_Folder "`Catenate "{HelpDirectory}"Help_Folder`"
Export HelpDirectory
if not "`Exists "{HelpDirectory}"Help`"
Echo > "{HelpDirectory}"Help
End
# Advise the Metrowerks Environment that we've started up 411
RMetrowerks '411•' ''